home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •Games Parlour• / MacMatch ••• / MacMatch / MacMatch.rsrc / CODE_5_Initial.txt < prev    next >
Text File  |  1987-02-19  |  13KB  |  225 lines
  1. # near model CODE resource
  2. # jump table entries: 336-336 (1 of them)
  3. export_42:
  4. 00000000  4E56 FFF8                link       A6, -0x0008
  5. 00000004  48E7 0328                movem.l    -[A7], D6,D7,A2,A4
  6. 00000008  41ED 8708                lea.l      A0, [A5 - 0x78F8]
  7. 0000000C  2F08                     move.l     -[A7], A0
  8. 0000000E  A86E                     syscall    InitGraf
  9. 00000010  A8FE                     syscall    InitFonts
  10. 00000012  A912                     syscall    InitWindows
  11. 00000014  A9CC                     syscall    TEInit
  12. 00000016  3F3C FFFF                move.w     -[A7], 0xFFFF
  13. 0000001A  4267                     clr.w      -[A7]
  14. 0000001C  201F                     move.l     D0, [A7]+
  15. 0000001E  A032                     syscall    FlushEvents
  16. 00000020  42A7                     clr.l      -[A7]
  17. 00000022  A97B                     syscall    InitDialogs
  18. 00000024  41ED C92E                lea.l      A0, [A5 - 0x36D2]
  19. 00000028  2B48 9852                move.l     [A5 - 0x67AE], A0
  20. 0000002C  3B7C 0034 9856           move.w     [A5 - 0x67AA], 0x34 /* '4' */
  21. 00000032  486D 9858                pea.l      [A5 - 0x67A8]
  22. 00000036  4267                     clr.w      -[A7]
  23. 00000038  4267                     clr.w      -[A7]
  24. 0000003A  3F3C 01A0                move.w     -[A7], 0x1A0
  25. 0000003E  3F3C 00F0                move.w     -[A7], 0xF0
  26. 00000042  A8A7                     syscall    SetRect
  27. 00000044  41ED 986E                lea.l      A0, [A5 - 0x6792]
  28. 00000048  2B48 9860                move.l     [A5 - 0x67A0], A0
  29. 0000004C  3B7C 0034 9864           move.w     [A5 - 0x679C], 0x34 /* '4' */
  30. 00000052  486D 9866                pea.l      [A5 - 0x679A]
  31. 00000056  4267                     clr.w      -[A7]
  32. 00000058  4267                     clr.w      -[A7]
  33. 0000005A  3F3C 01A0                move.w     -[A7], 0x1A0
  34. 0000005E  3F3C 00F0                move.w     -[A7], 0xF0
  35. 00000062  A8A7                     syscall    SetRect
  36. 00000064  42A7                     clr.l      -[A7]
  37. 00000066  A8D8                     syscall    NewRgn
  38. 00000068  2B5F 972A                move.l     [A5 - 0x68D6], [A7]+
  39. 0000006C  42A7                     clr.l      -[A7]
  40. 0000006E  3F3C 0004                move.w     -[A7], 0x4
  41. 00000072  A9B9                     syscall    GetCursor
  42. 00000074  2B5F FA50                move.l     [A5 - 0x5B0], [A7]+
  43. 00000078  2F2D FA50                move.l     -[A7], [A5 - 0x5B0]
  44. 0000007C  4EAD 007A                jsr        [A5 + 0x7A /* export_11 */]
  45. 00000080  A930                     syscall    InitMenus
  46. 00000082  42A7                     clr.l      -[A7]
  47. 00000084  3F3C 0001                move.w     -[A7], 0x1
  48. 00000088  A9BF                     syscall    GetRMenu
  49. 0000008A  2B5F FA70                move.l     [A5 - 0x590], [A7]+
  50. 0000008E  206D FA70                movea.l    A0, [A5 - 0x590]
  51. 00000092  2050                     movea.l    A0, [A0]
  52. 00000094  7001                     moveq.l    D0, 0x01
  53. 00000096  11BC 0014 000E           move.b     [A0 + D0.w + 0xE], 0x14
  54. 0000009C  7C02                     moveq.l    D6, 0x02
  55. 0000009E  601A                     bra        +0x1C /* 000000BA */
  56. label000000A0:
  57. 000000A0  3006                     move.w     D0, D6
  58. 000000A2  E540                     asl        D0.w, 2
  59. 000000A4  2F00                     move.l     -[A7], D0
  60. 000000A6  42A7                     clr.l      -[A7]
  61. 000000A8  3F06                     move.w     -[A7], D6
  62. 000000AA  A9BF                     syscall    GetRMenu
  63. 000000AC  221F                     move.l     D1, [A7]+
  64. 000000AE  201F                     move.l     D0, [A7]+
  65. 000000B0  41ED FA6C                lea.l      A0, [A5 - 0x594]
  66. 000000B4  2181 0000                move.l     [A0 + D0.w], D1
  67. 000000B8  5246                     addq.w     D6, 1
  68. label000000BA:
  69. 000000BA  0C46 0005                cmpi.w     D6, 0x5
  70. 000000BE  6FE0                     ble        -0x1E /* 000000A0 */
  71. 000000C0  7C01                     moveq.l    D6, 0x01
  72. 000000C2  6012                     bra        +0x14 /* 000000D6 */
  73. label000000C4:
  74. 000000C4  3006                     move.w     D0, D6
  75. 000000C6  E540                     asl        D0.w, 2
  76. 000000C8  41ED FA6C                lea.l      A0, [A5 - 0x594]
  77. 000000CC  2F30 0000                move.l     -[A7], [A0 + D0.w]
  78. 000000D0  4267                     clr.w      -[A7]
  79. 000000D2  A935                     syscall    InsertMenu
  80. 000000D4  5246                     addq.w     D6, 1
  81. label000000D6:
  82. 000000D6  0C46 0005                cmpi.w     D6, 0x5
  83. 000000DA  6FE8                     ble        -0x16 /* 000000C4 */
  84. 000000DC  3B7C 0001 FEAC           move.w     [A5 - 0x154], 0x1
  85. 000000E2  2F2D FA7C                move.l     -[A7], [A5 - 0x584]
  86. 000000E6  3F2D FEAC                move.w     -[A7], [A5 - 0x154]
  87. 000000EA  1F3C 0001                move.b     -[A7], 0x1
  88. 000000EE  A945                     syscall    CheckItem
  89. 000000F0  3B7C 0001 FEAE           move.w     [A5 - 0x152], 0x1
  90. 000000F6  2F2D FA80                move.l     -[A7], [A5 - 0x580]
  91. 000000FA  3F2D FEAE                move.w     -[A7], [A5 - 0x152]
  92. 000000FE  1F3C 0001                move.b     -[A7], 0x1
  93. 00000102  A945                     syscall    CheckItem
  94. 00000104  4267                     clr.w      -[A7]
  95. 00000106  4EAD 0142                jsr        [A5 + 0x142 /* export_36 */]
  96. 0000010A  A937                     syscall    DrawMenuBar
  97. 0000010C  422D FB88                clr.b      [A5 - 0x478]
  98. 00000110  486D 9726                pea.l      [A5 - 0x68DA]
  99. 00000114  3F3C 006C                move.w     -[A7], 0x6C /* 'l' */
  100. 00000118  4EAD 002A                jsr        [A5 + 0x2A /* export_1 */]
  101. 0000011C  2F2D 9726                move.l     -[A7], [A5 - 0x68DA]
  102. 00000120  A86F                     syscall    OpenPort
  103. 00000122  42A7                     clr.l      -[A7]
  104. 00000124  3F3C 0100                move.w     -[A7], 0x100
  105. 00000128  A9BA                     syscall    GetString
  106. 0000012A  2B5F 96AE                move.l     [A5 - 0x6952], [A7]+
  107. 0000012E  2F2D 96AE                move.l     -[A7], [A5 - 0x6952]
  108. 00000132  4EAD 006A                jsr        [A5 + 0x6A /* export_9 */]
  109. 00000136  4247                     clr.w      D7
  110. 00000138  6026                     bra        +0x28 /* 00000160 */
  111. label0000013A:
  112. 0000013A  42A7                     clr.l      -[A7]
  113. 0000013C  3007                     move.w     D0, D7
  114. 0000013E  D07C 0119                add.w      D0, 0x119
  115. 00000142  3F00                     move.w     -[A7], D0
  116. 00000144  A9BA                     syscall    GetString
  117. 00000146  285F                     movea.l    A4, [A7]+
  118. 00000148  3007                     move.w     D0, D7
  119. 0000014A  E140                     asl        D0.w, 8
  120. 0000014C  2054                     movea.l    A0, [A4]
  121. 0000014E  45ED 88AE                lea.l      A2, [A5 - 0x7752]
  122. 00000152  43F2 0000                lea.l      A1, [A2 + D0.w]
  123. 00000156  7040                     moveq.l    D0, 0x40
  124. label00000158:
  125. 00000158  22D8                     move.l     [A1]+, [A0]+
  126. 0000015A  5340                     subq.w     D0, 1
  127. 0000015C  6EFA                     bgt        -0x4 /* 00000158 */
  128. 0000015E  5247                     addq.w     D7, 1
  129. label00000160:
  130. 00000160  0C47 000D                cmpi.w     D7, 0xD /* '\r' */
  131. 00000164  6FD4                     ble        -0x2A /* 0000013A */
  132. 00000166  486D 889E                pea.l      [A5 - 0x7762]
  133. 0000016A  3F3C 000E                move.w     -[A7], 0xE
  134. 0000016E  3F3C 0130                move.w     -[A7], 0x130
  135. 00000172  3F3C 0060                move.w     -[A7], 0x60 /* '`' */
  136. 00000176  3F3C 014E                move.w     -[A7], 0x14E
  137. 0000017A  A8A7                     syscall    SetRect
  138. 0000017C  486D 889E                pea.l      [A5 - 0x7762]
  139. 00000180  486D 86F8                pea.l      [A5 - 0x7908]
  140. 00000184  A8A5                     syscall    FillRect
  141. 00000186  486D 889E                pea.l      [A5 - 0x7762]
  142. 0000018A  3F3C FFFC                move.w     -[A7], 0xFFFC
  143. 0000018E  3F3C FFFC                move.w     -[A7], 0xFFFC
  144. 00000192  A8A8                     syscall    OffsetRect
  145. 00000194  486D 88A6                pea.l      [A5 - 0x775A]
  146. 00000198  3F3C 000B                move.w     -[A7], 0xB
  147. 0000019C  3F3C 0137                move.w     -[A7], 0x137
  148. 000001A0  3F3C 005B                move.w     -[A7], 0x5B /* '[' */
  149. 000001A4  3F3C 0143                move.w     -[A7], 0x143
  150. 000001A8  A8A7                     syscall    SetRect
  151. 000001AA  486D 889E                pea.l      [A5 - 0x7762]
  152. 000001AE  A8A3                     syscall    EraseRect
  153. 000001B0  486D 889E                pea.l      [A5 - 0x7762]
  154. 000001B4  A8A1                     syscall    FrameRect
  155. 000001B6  4267                     clr.w      -[A7]
  156. 000001B8  4EAD 011A                jsr        [A5 + 0x11A /* export_31 */]
  157. 000001BC  4247                     clr.w      D7
  158. 000001BE  6062                     bra        +0x64 /* 00000222 */
  159. label000001C0:
  160. 000001C0  3007                     move.w     D0, D7
  161. 000001C2  5240                     addq.w     D0, 1
  162. 000001C4  E740                     asl        D0.w, 3
  163. 000001C6  41ED 96AA                lea.l      A0, [A5 - 0x6956]
  164. 000001CA  4870 0000                pea.l      [A0 + D0.w]
  165. 000001CE  3007                     move.w     D0, D7
  166. 000001D0  C1FC 0060                muls.w     D0, 0x60 /* '`' */
  167. 000001D4  D07C 0076                add.w      D0, 0x76 /* 'v' */
  168. 000001D8  3F00                     move.w     -[A7], D0
  169. 000001DA  3F3C 0122                move.w     -[A7], 0x122
  170. 000001DE  3007                     move.w     D0, D7
  171. 000001E0  C1FC 0060                muls.w     D0, 0x60 /* '`' */
  172. 000001E4  D07C 00BC                add.w      D0, 0xBC
  173. 000001E8  3F00                     move.w     -[A7], D0
  174. 000001EA  3F3C 0153                move.w     -[A7], 0x153
  175. 000001EE  A8A7                     syscall    SetRect
  176. 000001F0  3007                     move.w     D0, D7
  177. 000001F2  5240                     addq.w     D0, 1
  178. 000001F4  E740                     asl        D0.w, 3
  179. 000001F6  41ED 96CA                lea.l      A0, [A5 - 0x6936]
  180. 000001FA  4870 0000                pea.l      [A0 + D0.w]
  181. 000001FE  3007                     move.w     D0, D7
  182. 00000200  C1FC 0060                muls.w     D0, 0x60 /* '`' */
  183. 00000204  D07C 007E                add.w      D0, 0x7E /* '~' */
  184. 00000208  3F00                     move.w     -[A7], D0
  185. 0000020A  3F3C 013A                move.w     -[A7], 0x13A
  186. 0000020E  3007                     move.w     D0, D7
  187. 00000210  C1FC 0060                muls.w     D0, 0x60 /* '`' */
  188. 00000214  D07C 00B4                add.w      D0, 0xB4
  189. 00000218  3F00                     move.w     -[A7], D0
  190. 0000021A  3F3C 0148                move.w     -[A7], 0x148
  191. 0000021E  A8A7                     syscall    SetRect
  192. 00000220  5247                     addq.w     D7, 1
  193. label00000222:
  194. 00000222  0C47 0003                cmpi.w     D7, 0x3
  195. 00000226  6F98                     ble        -0x66 /* 000001C0 */
  196. 00000228  3F3C 0004                move.w     -[A7], 0x4
  197. 0000022C  4EAD 014A                jsr        [A5 + 0x14A /* export_37 */]
  198. 00000230  422D FC9A                clr.b      [A5 - 0x366]
  199. 00000234  422D FA65                clr.b      [A5 - 0x59B]
  200. 00000238  41ED 971A                lea.l      A0, [A5 - 0x68E6]
  201. 0000023C  43ED 86F8                lea.l      A1, [A5 - 0x7908]
  202. 00000240  20D9                     move.l     [A0]+, [A1]+
  203. 00000242  20D9                     move.l     [A0]+, [A1]+
  204. 00000244  41ED 9712                lea.l      A0, [A5 - 0x68EE]
  205. 00000248  43ED 86E0                lea.l      A1, [A5 - 0x7920]
  206. 0000024C  20D9                     move.l     [A0]+, [A1]+
  207. 0000024E  20D9                     move.l     [A0]+, [A1]+
  208. 00000250  41ED 970A                lea.l      A0, [A5 - 0x68F6]
  209. 00000254  43ED 86F0                lea.l      A1, [A5 - 0x7910]
  210. 00000258  20D9                     move.l     [A0]+, [A1]+
  211. 0000025A  20D9                     move.l     [A0]+, [A1]+
  212. 0000025C  41ED 9702                lea.l      A0, [A5 - 0x68FE]
  213. 00000260  43ED 86E8                lea.l      A1, [A5 - 0x7918]
  214. 00000264  20D9                     move.l     [A0]+, [A1]+
  215. 00000266  20D9                     move.l     [A0]+, [A1]+
  216. 00000268  41ED 96FA                lea.l      A0, [A5 - 0x6906]
  217. 0000026C  43ED 8700                lea.l      A1, [A5 - 0x7900]
  218. 00000270  20D9                     move.l     [A0]+, [A1]+
  219. 00000272  20D9                     move.l     [A0]+, [A1]+
  220. 00000274  4267                     clr.w      -[A7]
  221. 00000276  4EAD 0132                jsr        [A5 + 0x132 /* export_34 */]
  222. 0000027A  4CDF 14C0                movem.l    D6,D7,A2,A4, [A7]+
  223. 0000027E  4E5E                     unlink     A6
  224. 00000280  4E75                     rts
  225.